home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
s85xx
/
s8504b.d64
/
schraffur i
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
236b
|
18 lines
0 REM SCHRAFFUR I
10 (null)1:(null)1:(null)1:(null)
20 (null):(null)1,0
30 (null)1
40 (null)200,80,100,40
50 (null)150,100,80,90
60 (null)2
70 (null)
80 (null)1
90 (null)160,90
100 (null)3
110 (null)
120 FORI=0TO199STEP3:(null)0,I,I*1.6,0:(null)319,199-I,319-I*1.6,199:NEXT
130 (null)
140 (null)1
150 (null)1
160 FORI=0TO10000:NEXT:(null)0